home *** CD-ROM | disk | FTP | other *** search
/ Software Vault: The Gold Collection / Software Vault - The Gold Collection (American Databankers) (1993).ISO / cdr08 / bike01.zip / BIKE0104.TYP < prev    next >
Text File  |  1993-06-20  |  1KB  |  24 lines
  1. type
  2.         CodeStr            = string[8];
  3.  
  4.         TripRecord         = record
  5.                                  RecordStatus : longint;
  6.                                  Year         : 1985..2000;
  7.                                  Month        :    1..12;
  8.                                  Day          :    1..31;
  9.                                  DayOfWk      :    0..06;  {Sun=0}
  10.                                  Hours        :    0..24;
  11.                                  Minutes      :    0..59;
  12.                                  Seconds      :    0..59;
  13.                                  TimeInHours,
  14.                                  Distance,
  15.                                  AverageSpeed,
  16.                                  MaximumSpeed,
  17.                                  Odometer      : real;
  18.                                  Note          : string[45];
  19.                                  Key           : CodeStr;
  20.                                  DeleteCode    : boolean;
  21.                              end; {TripRecord}
  22.  
  23.         MaxDataType = TripRecord;
  24.         MaxKeyType  = CodeStr;